home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
051-075
/
disk_065
/
closewb
/
closewb.c
< prev
next >
Wrap
C/C++ Source or Header
|
1992-05-06
|
392b
|
19 lines
long IntuitionBase;
extern long OpenLibrary();
main()
{
IntuitionBase = OpenLibrary("intuition.library", 0);
if (IntuitionBase) {
puts ("closing the workbench screen");
if (CloseWorkBench() == 0)
puts ("unable to close the workbench screen");
CloseLibrary(IntuitionBase);
} else {
puts ("unable to open intuition.library");
}
}